Top 10k strings from Spectrum Special 3 (1983)(Shiva Publishing)(16k).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Compilations - Utilities & Educational & Various / Sinclair ZX Spectrum - Compilations - Various - [TZX] (TOSEC-v2006-06-06) /

Back to the directory listing

  16 HIT ANY KEY TO CONTINUE
  10 ;"OPTIONS"
  10 ;"1.  RUN program again           2.  Display instructions        3.  LOAD next program           4.  STOP"
   6 Please input a 
   4 q$="Select option number ":
   4 "              
   3 q$="Recommend -10 to 10 ":
   3 Select option number V
   3 HIT ANY KEY TO START
   3                  
   2 track=1000
   2 shade=4000
   2 q$="Select option number":
   2 ;n$(i)'"the ";e$(i)
   2 ;"ARE THE LINES PARALLEL?"
   2 ;"                           "
   2 ,(cf+ct)/2
   2 "Select option number ";opt
   2 "Choose spacing 10-35 ";q
   2 "             
   1 z$="polygon"
   1 y+" is a "+c$
   1 write program to draw picture here
   1 there are nine and sixty ways of constructing tribal lays       Have you managed to decode this message yet                     heat not a furnace for your foe so hot that it do singe yourselfoh the roast beef of old england and englands roast beef        the bowsprit got mixed with the rudder sometimes                it is an ancient mariner and he stoppeth one of three           you are trying to decipher this on a sinclair spectrum          i must get out of these wet clothes and into a dry martini      watch the magazines for the latest books from shiva publishing  while shepherds washed their socks by night                     
   1 there are nine and sixty ways of constructing tribal lays       C0
   1 testmove=2000
   1 ro2=ro2/10
   1 ro1=ro1/10
   1 record of choice
   1 q$="Year number?  ":
   1 q$="SIZE OF BET?":
   1 q$="Recommended -20 to 20 ":
   1 q$="Move which pair (top no.)?":
   1 q$="Move which cat? (0 to EXIT)":
   1 q$="Month number  ":
   1 q$="How many cats? (2 to 9)":
   1 q$="Day number?   ":
   1 q$="1 to 20 ":
   1 q$="1 to 15 ":
   1 q$="0 or 1 ":
   1 p$=p$+".":
   1 n(i)=n(i)+1
   1 n$=" 1 2 3 4 5 6 7 8 9"
   1 mexrxarxjnjxajlqntmpsapqyvwyjqmrgwmnjumrniaddapq
   1 menu      K
   1 makemove=3000
   1 k$="202020202000"
   1 getmove=1000
   1 frequency analysis
   1 col;"                                ";
   1 c$=c$+b$(c-96
   1 b$=b$+a$(m):
   1 b$="SUNDAY   MONDAY   TUESDAY  WEDNESDAYTHURSDAY FRIDAY   SATURDAY "
   1 b$(n)=" ":
   1 automatic loading
   1 abcdefgiklqrstuwxzG
   1 a$="abcdefghijklmnopqrstuvwxyz"
   1 a$="033614625035"
   1 WHITE  YELLOW CYAN   GREEN  MAGENTARED    BLUE   BLACK  
   1 Ursa Major
   1 TZXed by Andrew Barker
   1 Spectrum Special 3
   1 Shiva Software
   1 SUNDAY   MONDAY   TUESDAY  WEDNESDAYTHURSDAY FRIDAY   SATURDAY V
   1 SORRY... NO SUCH DATE. TRY AGAIN
   1 SIZE OF BET?V
   1 SHIVA       
   1 SELECT EXPERIMENT:
   1 Robin Jones
   1 PUBLISHING  
   1 Original Release
   1 Ltd.           
   1 Ian Stewart
   1 How many cats? (2 to 9)
   1 HIT ANY KEY TO PLAY
   1 Frequency Analysis
   1 FRIDAY   Q
   1 Each program includes its own   documentation 
   1 Crab         Swan         Twins        Lion         Hunter       Great Bear                                                                                 
   1 Cancer      Cygnus      Gemini      Leo         Orion       Ursa Major                                                                          
   1 AUTOMATICALLY
   1 ;a;" chips  "
   1 ;"You took ";mx;" moves...";
   1 ;"You took ";cam;" moves" 
   1 ;"YOU'VE DONE IT!!"
   1 ;"YES, THEY DO. BUT THEY APPEARED NOT TO."
   1 ;"What colour afterimage did      you see?  ";c$(p+1
   1 ;"This is a utility program which shades areas inside curves.  To use it in your own programs     delete all but lines 50-4140 andSAVE these on tape."
   1 ;"THEY ARE, BUT THEY DON'T LOOK IT"
   1 ;"THEY ARE THE SAME LENGTH"
   1 ;"Sorry, you can't do that!":
   1 ;"Sorry, wrong answer."'"The answer is ";n$(i)'"the ";e$(i)
   1 ;"See if you can improve your     record."
   1 ;"STEER CLEAR OF SAMMY THE SHARK!"
   1 ;"STARE AT THE SQUARE for 20      seconds"
   1 ;"REMINDER: usual order ETNROAISD";
   1 ;"PROGRAM OPTIONS:                                                     1. Automatic List               2. Name search                  3. Astroquiz"
   1 ;"NOT FOUND":
   1 ;"MESSIEURS"
   1 ;"JEUX..."
   1 ;"Illegal"
   1 ;"ILLEGAL MOVE!!":
   1 ;"FAITES";
   1 ;"ENTER 0 TO EXIT PROGRAM"
   1 ;"DONE IT!";
   1 ;"DO THE TWO SEGMENTS LIE IN A    STRAIGHT LINE?"'"Hit any key to see."                               
   1 ;"Cats swapped!";
   1 ;"CORRECT!"
   1 ;"BET ON ";b$;
   1 ;"...MESDAMES";
   1 ;" 100 chips "
   1 ;" ";w;" chips  "
   1 ;"  WHICH LINE IS THE LONGEST?"
   1 ;"   TURN TAPE OVER AND REWIND";
   1 ;"      ":
   1 ;"       "
   1 ;"              "
   1 ;"                                ";:
   1 9         
   1 8         1
   1 7         F
   1 6         h
   1 5         j 
   1 4         E
   1 3         
   1 222220000000X
   1 2         Z
   1 17.3.2000 is a FRIDAY   S
   1 10        8
   1 1         
   1 06666688174145506666688875577775036662817774503666288754718755066666872844117563775066666877875788755506666687777750666668887557777506666688875577775
   1 0666668778174550687503666281777450666877750666668887557777506626687717756657750366628175657778845036662817774506668777506666687772227777756664440362865528174578845
   1 0362865528174578845D
   1 033614625035B?
   1 /n+ro2+r*u)
   1 /n+ro1+r*u)
   1 , use the command   LOAD ""
   1 , use LOAD ""
   1 *n(i)/tot)):
   1 );". Do you want to leave it?";y$
   1 );" for code letter ";
   1 (xl+c,y)=0
   1 (w(a)-p)>2
   1 (instructions)"
   1 ((rf+rt)/2
   1 '''"Select shape:"'''"      1. Traditional                  2. Latin Cross                  3. Greek Cross                  4. Tilted Square"
   1 '''"   ABCDEFGHIJKLMNOPQRSTUVWXYZ   "'"   ZYXWVUTSRQPONMLKJIHGFEDCBA   "''"????????????????????????????????????????????????????????????????"
   1 '''"     1. AFTERIMAGES                  2. HERING ILLUSION              3. WUNDT ILLUSION               4. POGGENDORF ILLUSION          5. MULLER-LYER ILLUSION         6. WERTHEIMER ILLUSION          7. SCHWINDEL ILLUSION"
   1 '''"                      
   1 ''"Watch for the circles when the  screen has been filled."
   1 ''"The message was:"''m$
   1 ''"THEY ARE, BUT THEY DON'T LOOK IT"
   1 ''"Please do not BREAK while the   random dots are being plotted."
   1 '"It will reappear after an       analysis of the letter          frequencies occurring in it."
   1 '"Don't forget the capitals       when inputting names."
   1 '"Actual code:"'"abcdefghijklmnopqrstuvwxyz"'b$
   1 '" To obtain the list of available programs, press any key.":
   1 '" Similarly, for program number   
   1 '" Alternatively, you can press    key 
   1 '"  The results may be printed    out or saved on tape."
   1 '"  Programs are numbered 1 - 10    and may be run either           
   1 '"  Hang on, this looks a bit     complicated..."
   1 '"  A selection of 
   1 "where the symbol 
   1 "the guesses if you wish.          It also gives a frequency     analysis of the letters in the  coded message, as a hint."
   1 "guess at decode?";g$:
   1 "from / to ? ";f$,t$
   1 "code letter?";k$:
   1 "choose how many, and how long   the PAUSE lasts.  Try PAUSE=10  and NUMBER=1 first." 
   1 "by a series of legal moves.       A move consists of jumping onepeg over another into an empty  space.  The peg jumped over is  removed."
   1 "according to a fixed rearrange- ment of the alphabet. Your job  is to decode it.  The machine   will allow you to guess letters and try them out, and to change"
   1 "You may move a cat if it is     sitting next to the space, or   you may hop it over exactly one intervening cat."
   1 "You have used ";
   1 "Which constellation is this?    Latin name please. ";q$:
   1 "Which Colour do you want? ";p
   1 "This puzzle starts with a numberof cats (you choose how many)   sitting on a wall in order          
   1 "This experiment shows how the   eye can detect regular movement against a random background,    but not the final result."
   1 "This experiment investigates    the illusion of motion.   You   will see a number of pairs of   flashing lights.  You must"
   1 "The object of the puzzle is to  rearrange the five cats and     five dogs sitting on the steps."
   1 "The code message will appear    in a moment.  It is..."'
   1 "The Spectrum will present you   with a message coded by a       substitution code.  That is,    the letters will be changed"
   1 "TWIST 2 = ";
   1 "TWIST 1 = ";
   1 "Select option number ";q$
   1 "Select option number ";p$
   1 "Select option number ";o$
   1 "STAR CHART displays six         different star constellations   together with their Latin and   English names.   Using a menu   you may select one of:"
   1 "SHADING WINDOW top";swt
   1 "SHADING WINDOW right";swr
   1 "SHADING WINDOW left";swl
   1 "SHADING WINDOW bottom";swb
   1 "SAVE on new tape? y/n ";y$
   1 "SAVE name? ";z$:
   1 "ROTATION PER STEP = ";
   1 "PAUSE?";p
   1 "Option number? ";o$
   1 "OVER = ";
   1 "NUMBER?";n
   1 "NUMBER OF SIDES = ";
   1 "NUMBER OF POLYGONS = ";
   1 "Latin Name of Constellation?   ";q$
   1 "FURTHER DOCUMENTATION:"''"The program will shade within a chosen'window' on the screen.   Boundary curves should lie      entirely within the window and  have no breaks or crossings."
   1 "FAITES VOS JEUX (
   1 "Code message:"'c$''"Decoded message:"'p$''
   1 "Code guessed so far:"
   1 "COPY to printer? y/n ";y$
   1 "CHOOSE EXPERIMENT NUMBER ";exp
   1 "BEND = ";
   1 "(the yellow pixel dangles).     For additional description see  FURTHER PROGRAMMING FOR THE     ZX SPECTRUM, Shiva."    
   1 "'"  6. Solitaire                    7. Dayfinder                    8. Codebreaker                  9. Beasts on the Steps          10.Blockfill"
   1 "'"  1. Roulette                     2. Star Chart                   3. Cat-Swap                     4. Polygons                     5. Psychospectrology"                                
   1 "" or hit the key  with number 
   1 "" and follow the usual   procedure [Sinclair 
   1 " To LOAD an individual program,  say number 
   1 " Set the tape to the correct     place and LOAD ""(program        number)"" as usual. To find the  location type LOAD ""test"" and   watch the screen messages.      Note the tape counter number or the time taken to wind on, and  use this to save time on the    next occasion you use this      tape."
   1 "  You start the game with 100   chips.   When asked FAITES VOS  JEUX you may bet either on:"
   1 "  You must end with the cats    on steps 1-5, and the dogs on   steps 6-10."
   1 "  You may bet more money than   you actually have... but beware if you lose!"
   1 "  You have four choices of startposition... see the next        display."
   1 "  You can move any ADJACENT pairinto the blank spaces by        inputting the number beside the TOP animal in the pair."
   1 "  To stop at any time input 
   1 "  To give up, input 0."
   1 "  To give up and exit the       program, enter 0."
   1 "  To STOP, enter s or S when yousee the reminder."
   1 "  This program will calculate   on which day of the week any    given date falls."
   1 "  This program draws polygons.  You are asked to input various  parameters:"
   1 "  This is a traditional puzzle  adapted to the Computer Age.      The object is to remove all   but one peg 
   1 "  Then input the size of your   bet as a number."
   1 "  The inputs give you the       permitted range of sizes."
   1 "  The experiments deal with     optical illusions, colour       perception, and the illusion    of motion."
   1 "  The constellations included   are                                Cancer  Cygnus  Leo             Gemini  Orion   Ursa Major"
   1 "  The commonest letters in      English are ETNROAISD in that   order."
   1 "  Random demonstration curves   will now be shaded.  To speed   up the process, only a central  window will be used."
   1 "  Press keys corresponding to   the number above the cat you    wish to move into the space."
   1 "  Number of sides                 Two vertex twists               Amount of bend in sides         Number of polygons to be drawn  Rotation between successive        polygons                     OVER value."
   1 "  Input the day number (1-31),  month (1-12), and year.           Note that the year should be  written in full: for example    input 1945, not just 45."
   1 "  If you are wrong you lose     your stake.   If right, you get it back doubled (EVEN or ODD)   or tenfold (NUMBER)."
   1 "  Further documentation will    follow the demonstration."
   1 "  For example enter d2 and then d4 to jump the peg on d2 over   the one on d3 and into d4."
   1 "  Enter your moves according to the row LETTER and column       NUMBER marked on the screen."
   1 "  Curves should NOT possess     'dangling ends' such as this:        
   1 "  As a test input day 24,       month 9, year 1945.  You        should get MONDAY as the answer."
   1 "  As a demonstration it will    shade part of the title.          Please note that this program is 
   1 "  A Menu gives you seven choicesof experiment in the psychology of perception.  Input your      selection and follow the        instructions."''
   1 "   To load back use"''"    LOAD """;z$;""" SCREEN$"
   1 "     NUMBER (INPUT one of 0-9)       EVEN   (INPUT e or E)           ODD    (INPUT o or O)"
   1 "       AFTERIMAGES"''"Select a colour and stare at a  square.   What colour is the    afterimage? It should be roughlythe complementary colour - the  one making the colour codes add to 7."
   1 "        Automatic listing               Search                          A test of your knowledge"
   1 "                    
   1 "            
   1 "         
   1  when asked for in the     automatic loading mode."
   1  tested       programs for the Sinclair       ZX 
   1  page 141]."
   1  or individually"
   1  on it. Do 
   1  means an     empty space.  You must rearrangethem into the order                 
   1  from the board"
   1  for ""yes"",any other     key for ""no"""
   1  devised by          Ian Stewart and Robin Jones."
   1  and that nothing may    appear to happen for periods of about 30 seconds on occasion."
   1  TO STOP)";b$:
   1  Do you want 
   1  1983      
   1  1 2 3 4 5 6 7 8 9V
   1  1 2 3 ..."
   1  ... 3 2 1"
   1    Input the number of the        program. If it is greater       than 5, turn the tape over      and rewind."
   1      use the 
   1          Bq
   1                                 n
   1                                           @x
   1                                                                                                                                                                                                                                                                                                                                                                         L
   1                                
   1                              
   1